/PREP7
LSCLEAR,ALL 
CPDELE, 1   
CPDELE, 2   
CPDELE, 3   
CPDELE, 4   
CPDELE, 5   
/USER,  1   
/VIEW,  1, -0.366264156076E-01,  0.470981280489E-01,  0.998218549224
/ANG,   1, -0.408748441687E-01  
/REPLO  
/VIEW,  1,  0.921430210908    ,  0.150201580706    ,  0.358337622334
/ANG,   1,  -93.8356350118  
/REPLO  
/DIST, 1 ,1.082226,1
/REP,FAST   
/DIST, 1 ,1.082226,1
/REP,FAST   
/DIST, 1 ,1.082226,1
/REP,FAST   
/VIEW,1,,,1 
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
FLST,5,1541,1,ORDE,2
FITEM,5,1542
FITEM,5,-3082   
NSEL,S, , ,P51X 
/REPLOT 
FLST,5,1541,1,ORDE,2
FITEM,5,1542
FITEM,5,-3082   
NSEL,S, , ,P51X 
CP, 1, VOLT, ALL
ALLSEL,ALL  
/REPLOT 
FLST,5,1541,1,ORDE,2
FITEM,5,1   
FITEM,5,-1541   
NSEL,S, , ,P51X 
CP, 2, VOLT, ALL
/REPLOT 
FINISH  
/SOL
!*  
ANTYPE,0
/VIEW,  1,  0.976556779693    ,  0.726095597138E-01,  0.202644289022
/ANG,   1,  -90.4686142707  
/REPLO  
/VIEW,  1,  0.933667407259    , -0.129797788742E-01,  0.357905990398
/ANG,   1,  -90.7219132974  
/REPLO  
FLST,2,1,5,ORDE,1   
FITEM,2,2   
/GO 
!*  
SFA,P51X,1,PRES,1   
CPLIST  
ALLSEL,ALL  
/REPLOT 
CPLIST  
FLST,2,1,1,ORDE,1   
FITEM,2,1   
/GO 
!*  
D,P51X,VOLT,0   
/VIEW,  1,  0.489195077702    , -0.750989135428    , -0.443512676731
/ANG,   1,  -121.439371456  
/REPLO  
/VIEW,  1, -0.619065483409    , -0.590606126906    , -0.517631461672
/ANG,   1,   109.296592876  
/REPLO  
FLST,2,3,5,ORDE,3   
FITEM,2,1   
FITEM,2,3   
FITEM,2,5   
DA,P51X,SYMM
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
!*  
/EFACET,1   
PLNSOL, VOLT,, 0,1.0
ESEL,U,MAT,,1   
/REPLOT 
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
/ANG,1,-30,ZS,1 
/REP,FAST   
/ANG,1,-30,YS,1 
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   

